home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Sacred & Secular
/
Sacred and Secular.iso
/
pc
/
movies
/
shared.dir
/
05030_Script_Movie Script 3
< prev
next >
Wrap
Text File
|
1996-04-03
|
9KB
|
266 lines
global firstpan,firstsnd
global currentcast,firstincr,endincr
global spritevis,popuptoggle
global wherefrom,onPics,visicon,timeicon,globeicon,icon
global soundcastno,picloclist2,comingfrom
global vispiclist,grow,gindex,narron,musicon
global timepiclist1,timepiclist2,timepiclist3,timepiclist4
global guidelist1,guidelist2,guidelist3,guidelist4,guidelist5
global geoorder,visorder,timeorder,sndfilename,sndfileno
global gskip,frame,frame2
global zoomin,zoomout,zoommask,rplane,lplane,rplanemask,lplanemask
global hand,handmask,glossplaceholder,gGlossUpFrame
on hiliteMexico1Pic
-- set the visible of sprite 16 to false
-- set the visible of sprite 17 to false
set onpics = 0
set the visible of sprite 17 to rollover(19)
if not rollOver(19) then
if rollover(6) then moveframe 6,1318,565,129
else if rollover(7) then moveframe 7,1396,545,133
else if rollover(8) then moveframe 8,1312,565,128
else if rollover(10) then moveframe 10,1365,515,182
else if rollover(13) then moveframe 13,1354,449,191
else if rollover(11) then moveframe 11,1346,551,137
else if rollover(9) then moveframe 9,1320,575,132
else if rollover(12) then moveframe 12,1389,584,140
else if rollover(14) then movesevframes (0,0,14,565,129,[6,8],2)
else if rollover(15) then movesevframes (0,0,15,545,133,[7],2)
else if rollover(20) then movesevframes (0,0,20,515,182,[10],2)
else if rollover(21) then movesevframes (0,0,21,449,191 ,[13],2)
else if rollover(22) then movesevframes (0,0,22,551,137 ,[11],2)
else if rollover(23) then movesevframes (0,0,23,575,132 ,[9],2)
else if rollover(25) then movesevframes (0,0,25,584,140,[12],2)
end if
if not onPics then
checkghostrollover
set the locH of sprite 2 to -640
set the locH of sprite 4 to -640
set the locH of sprite 5 to -640
end if
end hiliteMexPic
on hiliteGreece1Pic
-- set the visible of sprite 24 to false
-- set the visible of sprite 16 to false
-- set the visible of sprite 17 to false
set onpics = 0
set chan24 = 0
set the visible of sprite 17 to rollover(19)
if not rollOver(19) then
if rollover(7) then moveframe 7,1302,459,185
else if rollover(8) then moveframe 8,1321,431,177
else if rollover(9) then moveframe 9,1369,487,192
else if rollover(13) then moveframe 13,1391,543,215
else if rollover(10) then moveframe 10,1368,431,177
else if rollover(6) then moveframe 6,1388,423,196
else if rollover(11) then moveframe 11,1347,505,193
else if rollover(12) then moveframe 12,1363,458,166
else if rollover(15) then movesevframes (0,0,15,459,185,[7],2)
else if rollover(20) then movesevframes (0,0,20,431,177,[8,10],2)
else if rollover(21) then movesevframes (0,0,21,487,192,[9],2)
else if rollover(22) then movesevframes (0,0,22,543,215,[13],2)
else if rollover(23) then movesevframes (0,0,23,423,196,[6],2)
else if rollover(25) then movesevframes (0,0,25,505,193,[11],2)
else if rollover(27) then movesevframes (0,0,27,458,166 ,[12],2)
else if rollover(14) or rollOver(45) then
if rollOver(14) then positiontext (1308,0,30)
set the locH of sprite 4 to 560
set the locV of sprite 4 to 211
set the locH of sprite 5 to -640
set chan24 = 1
set onPics = 1
end if
end if
set the visible of sprite 24 = chan24
if not onPics then
checkghostrollover
set the locH of sprite 2 to -640
set the locH of sprite 4 to -640
set the locH of sprite 5 to -640
end if
end hiliteGreecePic
on hiliteEgypt1Pic
-- set the visible of sprite 24 to false
-- set the visible of sprite 16 to false
-- set the visible of sprite 17 to false
set onpics = 0
set the visible of sprite 17 to rollover(19)
set chan24 = 0
if not rollOver(19) then
if rollover(11) then moveframe 11,1305,473,80
else if rollover(7) then moveframe 7,1384,469,66
else if rollover(9) then moveframe 9,1379,471,73
else if rollover(12) then moveframe 12,1329,518,237
else if rollover(14) then moveframe 14,1301,486,274
else if rollover(13) then moveframe 13,1367,518,251
else if rollover(10) then moveframe 10,1352,512,189
else if rollover(8) then moveframe 8,1343,446,95
else if rollover(31) then movesevframes (0,0,31,473,80,[11],2)
else if rollover(20) then movesevframes (0,0,20,471,73,[9],2)
else if rollover(27) then movesevframes (0,0,27,518,237,[12],2)
else if rollover(23) then movesevframes (0,0,23,486,274,[14],2)
else if rollover(22) then movesevframes (0,0,22,518,251,[13],2)
else if rollover(25) then movesevframes (0,0,25,512,189,[10],2)
else if rollover(21) then movesevframes (0,0,21,446,95,[8],2)
else if rollover(6) then
positiontext (1300,100,12)
set the locH of sprite 4 to 469
set the locV of sprite 4 to 66
set the locH of sprite 5 to -640
set chan24 = 1
set onPics = 1
else if rollover(15) then
set chan24 = 1
movesevframes (0,0,15,469,66,[8],2)
end if
end if
set the visible of sprite 24 = chan24
if not onPics then
checkghostrollover
set the locH of sprite 2 to -640
set the locH of sprite 4 to -640
set the locH of sprite 5 to -640
end if
end hiliteEgyptPic
on hiliteUK1Pic
-- set the visible of sprite 24 to false
-- set the visible of sprite 16 to false
-- set the visible of sprite 17 to false
set onpics = 0
set the visible of sprite 17 to rollover(19)
set chan24 = 0
if not rollOver(19) then
if rollover(8) then moveframe 8,1387,517,214
else if rollover(12) then moveframe 12,1317,510,215
else if rollover(13) then moveframe 13,1381,517,234
else if rollover(10) then moveframe 10,1395,526,210
else if rollover(14) then moveframe 14,1376,517,234
else if rollover(11) then moveframe 11,1375,517,234
else if rollover(7) then moveframe 7,1315,503,245
else if rollover(9) then moveframe 9,1314,503,245
else if rollover(20) then movesevframes (0,0,20,517,214,[8],2)
else if rollover(21) then movesevframes (0,0,21,510,215,[12],2)
else if rollover(22) then movesevframes (0,0,22,517,234,[11,13,14],2)
else if rollover(23) then movesevframes (0,0,23,526,210,[10],2)
else if rollover(25) then movesevframes (0,0,25,503,245,[7,9],2)
else if rollover(6) or rollOver(15) then
if rollOver(6) then positiontext (1333,2,30)
set the locH of sprite 4 to 490
set the locV of sprite 4 to 229
set the locH of sprite 5 to -640
set onPics = 1
set chan24 = 1
end if
end if
set the visible of sprite 24 = chan24
if not onPics then
checkghostrollover
set the locH of sprite 2 to -640
set the locH of sprite 4 to -640
set the locH of sprite 5 to -640
end if
end hiliteUKPic
on picturetext
stopQTSound
sound stop 1
set holda = currentcast - 300
set holdb = string(holda)
if the movie <> "BRIDGES.DIR" then
go (holdb&"text") of movie "BRIDGES.DIR"
else
go (holdb&"text")
end if
puppetsprite 2,false
puppetsprite 4,false
puppetsprite 7,false
set the visible of sprite 17 to true
set the rect of sprite 7 = rect(300,186,743,294)
set the castnum of sprite 7 to 816
set the locH of sprite 7 to -640
-- set the text of field "ENTERTEXT" to ""
-- set the text of cast "DATA" to ""
repeat with i = 4 to 8
set the visible of sprite i to false
end repeat
set the visible of sprite 22 to false
-- dmd set the visible of sprite 16 to false
set comingfrom = 90
end picturetext
on getglossary glossword,placesprite
global popuptoggle
--
--
-- If there is a glossary link up now, clear it, then exit.
--
if the locH of sprite 3 <> -640 and gGlossUpFrame > 0 and rollOver(3) then
set the locH of sprite 3 = -640
set the castnum of sprite 3 = glossplaceholder
set gGlossUpFrame = 0
exit
end if
--
--
-- Handle the find stuff first, rather than a hyperlink that lies
-- near or under the find box (DMD)
--
-- fix the fact that the mouseline won't work if a higher numbered
-- element is on top... first must make it invisible, then check mouseline.
--
if the visible of sprite 4 then
if rollOver(6) then
set s = the clickOn
set the visible of sprite s = 0
updateStage
set mline = the mouseline
set the visible of sprite s = 1
gotoframe mline
exit
else
exit -- ignore for now
end if
else if popUpToggle then exit
--if the visible of sprite 3 = false then
set whatgloss = the castnum of sprite 3
--put ">>> getGlossary" && whatGloss && glossWord && (whatgloss = glossword)
if whatgloss = glossword then
set the locH of sprite 3 = -640
set the castnum of sprite 3 = glossplaceholder
set gGlossUpFrame = 0
else
set the puppet of sprite 3 = 1
set the castnum of sprite 3 to glossword
set the locH of sprite 3 = 300
set the locv of sprite 3 = 200
set gGlossUpFrame = the frame
end if
--end if
end getglossary